home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD BIT 75
/
CD BIT 75.iso
/
Software
/
LogOut
/
disk1
/
_SETUP.1
/
GCondom7.exe
/
0
/
RCDATA
/
TFRMRESUMOCALCULOS
/
TFRMRESUMOCALCULOS.txt
Wrap
Text File
|
2004-10-21
|
8KB
|
380 lines
object frmResumoCalculos: TfrmResumoCalculos
Left = 191
Top = 106
BorderStyle = bsNone
Caption = 'frmResumoCalculos'
ClientHeight = 450
ClientWidth = 710
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
KeyPreview = True
OldCreateOrder = True
Position = poScreenCenter
OnKeyPress = FormKeyPress
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Shape1: TShape
Left = 0
Top = 0
Width = 710
Height = 450
Align = alClient
end
object Label2: TLabel
Left = 8
Top = 8
Width = 231
Height = 29
Caption = 'Resumo das Quotas'
Font.Charset = ANSI_CHARSET
Font.Color = clGray
Font.Height = -24
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object Label3: TLabel
Left = 301
Top = 370
Width = 40
Height = 13
Caption = 'Totais:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object Label4: TLabel
Left = 345
Top = 370
Width = 70
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = 'Label4'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object Label5: TLabel
Left = 425
Top = 370
Width = 80
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = 'Label5'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object Label6: TLabel
Left = 510
Top = 370
Width = 85
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = 'Label6'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object Label7: TLabel
Left = 610
Top = 370
Width = 85
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = 'Label7'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object Label11: TLabel
Left = 10
Top = 390
Width = 102
Height = 13
Caption = '�rea Condom�nio:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object DBText1: TDBText
Left = 155
Top = 370
Width = 90
Height = 13
DataField = 'Permilagem'
DataSource = Dados.dsCondominio
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object DBText2: TDBText
Left = 120
Top = 390
Width = 42
Height = 13
AutoSize = True
DataField = '�rea'
DataSource = Dados.dsCondominio
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object Label10: TLabel
Left = 10
Top = 370
Width = 140
Height = 13
Caption = 'Permilagem Condom�nio:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object Label12: TLabel
Left = 10
Top = 410
Width = 66
Height = 13
Caption = 'Or�amento:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object DBText3: TDBText
Left = 120
Top = 410
Width = 42
Height = 13
AutoSize = True
DataField = 'Or�amento1'
DataSource = Dados.dsCondominio
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
Transparent = True
end
object Label13: TLabel
Left = 197
Top = 392
Width = 313
Height = 49
Alignment = taCenter
AutoSize = False
Caption =
'Os totais calculados representam o somat�rios das quotas dos con' +
'd�minos existentes baseados no crit�rio do condom�nio (Fixa, Per' +
'milagem, �rea) e est�o arredondados.'
Transparent = True
WordWrap = True
end
object Shape2: TShape
Left = 576
Top = 399
Width = 105
Height = 15
Pen.Color = clRed
end
object Shape3: TShape
Left = 490
Top = 430
Width = 112
Height = 1
Pen.Color = clRed
end
object Shape4: TShape
Left = 601
Top = 413
Width = 1
Height = 17
Pen.Color = clRed
end
object lblLinha: TLabel
Left = 573
Top = 392
Width = 110
Height = 13
AutoSize = False
Color = clWhite
ParentColor = False
end
object BitBtn1: TBitBtn
Left = 616
Top = 420
Width = 75
Height = 25
TabOrder = 0
Kind = bkOK
end
object DBGrid1: TDBGrid
Left = 5
Top = 48
Width = 700
Height = 308
Color = clInfoBk
Ctl3D = False
DataSource = DataSource1
FixedColor = 13551795
Options = [dgTitles, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
ParentCtl3D = False
ReadOnly = True
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
Columns = <
item
Expanded = False
FieldName = 'Codigo'
Title.Alignment = taCenter
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'Apelido'
Title.Alignment = taCenter
Width = 100
Visible = True
end
item
Expanded = False
FieldName = 'Nome'
Title.Alignment = taCenter
Width = 110
Visible = True
end
item
Expanded = False
FieldName = 'Fraccao'
Title.Caption = 'Frac��o'
Width = 90
Visible = True
end
item
Expanded = False
FieldName = 'Permilagem'
Title.Alignment = taCenter
Width = 60
Visible = True
end
item
Expanded = False
FieldName = 'Area'
Title.Alignment = taCenter
Title.Caption = '�rea'
Width = 80
Visible = True
end
item
Expanded = False
FieldName = 'Quota'
Title.Alignment = taCenter
Width = 90
Visible = True
end
item
Expanded = False
FieldName = 'QuotaAnual'
Title.Alignment = taCenter
Title.Caption = 'Quota Anual'
Width = 90
Visible = True
end>
end
object DataSource1: TDataSource
DataSet = MemoryTable1
Left = 360
Top = 8
end
object MemoryTable1: TMemoryTable
Left = 392
Top = 8
object MemoryTable1Codigo: TStringField
FieldName = 'Codigo'
end
object MemoryTable1Apelido: TStringField
FieldName = 'Apelido'
Size = 40
end
object MemoryTable1Nome: TStringField
FieldName = 'Nome'
Size = 40
end
object MemoryTable1Permilagem: TFloatField
FieldName = 'Permilagem'
DisplayFormat = '###,###,##0.##0'
end
object MemoryTable1rea: TFloatField
FieldName = 'Area'
DisplayFormat = '###,###,##0.#0'
end
object MemoryTable1Quota: TFloatField
FieldName = 'Quota'
DisplayFormat = '###,###,##0.#0'
end
object MemoryTable1QuotaAnual: TFloatField
FieldName = 'QuotaAnual'
DisplayFormat = '###,###,##0.#0'
end
object MemoryTable1Fraccao: TStringField
FieldName = 'Fraccao'
Size = 15
end
end
end